home *** CD-ROM | disk | FTP | other *** search
/ J-Mac Electronics & Home Comics / J-Mac Electronics & Home Comics.iso / mac / J-MAC / G23F / G23_NEGU.Dxr / 00082.ls < prev    next >
Encoding:
Text File  |  1998-01-22  |  3.2 KB  |  166 lines
  1. global i, gno, jumplistkeyg, jumplistkeyz
  2.  
  3. on startMovie
  4.   set mycursor to [1, 2]
  5.   repeat with i = 11 to 18
  6.     set the cursor of sprite i to mycursor
  7.   end repeat
  8.   set jumplistkeyg to ["G1", "G2", "G3", "G4", "G5", "G6", "G7", "G8", "G9", "G10", "G11"]
  9.   set jumplistkeyz to ["Z1", "Z2", "Z3", "Z4", "Z5", "Z6", "Z7", "Z8", "Z9", "Z10", "Z11"]
  10.   set volset to the soundLevel
  11.   if the soundEnabled = 0 then
  12.     set the soundEnabled to 1
  13.   end if
  14. end
  15.  
  16. on donextg
  17.   if (gno + 1) = 12 then
  18.     set gno to 0
  19.   end if
  20.   go(getAt(jumplistkeyg, gno + 1))
  21. end
  22.  
  23. on dobackg
  24.   if (gno - 1) = 0 then
  25.     set gno to 12
  26.   end if
  27.   go(getAt(jumplistkeyg, gno - 1))
  28. end
  29.  
  30. on doexit
  31.   sound stop 1
  32.   go("M4", "@::JMACMENU")
  33. end
  34.  
  35. on dolinkm
  36.   puppetSound(1, 1)
  37.   sound fadeOut 1, 60 * 2
  38.   delay(60 * 3)
  39.   sound stop 1
  40.   go(1, "yumenoat")
  41. end
  42.  
  43. on crtopen
  44.   puppetSprite(8, 1)
  45.   repeat while the stillDown
  46.     set the memberNum of sprite 8 to 17
  47.     updateStage()
  48.   end repeat
  49.   set the memberNum of sprite 8 to 16
  50.   updateStage()
  51.   puppetSprite(8, 0)
  52. end
  53.  
  54. on crtprof
  55.   puppetSprite(24, 1)
  56.   repeat while the stillDown
  57.     set the memberNum of sprite 24 to 67
  58.     updateStage()
  59.   end repeat
  60.   set the memberNum of sprite 24 to 66
  61.   updateStage()
  62.   puppetSprite(24, 0)
  63. end
  64.  
  65. on crtclose
  66.   puppetSprite(9, 1)
  67.   repeat while the stillDown
  68.     set the memberNum of sprite 9 to 19
  69.     updateStage()
  70.   end repeat
  71.   set the memberNum of sprite 9 to 18
  72.   updateStage()
  73.   puppetSprite(9, 0)
  74. end
  75.  
  76. on crtmstart
  77.   puppetSprite(10, 1)
  78.   repeat while the stillDown
  79.     set the memberNum of sprite 10 to 21
  80.     updateStage()
  81.   end repeat
  82.   set the memberNum of sprite 10 to 20
  83.   updateStage()
  84.   puppetSprite(10, 0)
  85. end
  86.  
  87. on crtnext
  88.   puppetSprite(20, 1)
  89.   repeat while the stillDown
  90.     set the memberNum of sprite 20 to 27
  91.     updateStage()
  92.   end repeat
  93.   set the memberNum of sprite 20 to 26
  94.   updateStage()
  95.   puppetSprite(20, 0)
  96.   puppetSprite(1, 0)
  97. end
  98.  
  99. on crtback
  100.   puppetSprite(21, 1)
  101.   repeat while the stillDown
  102.     set the memberNum of sprite 21 to 29
  103.     updateStage()
  104.   end repeat
  105.   set the memberNum of sprite 21 to 28
  106.   updateStage()
  107.   puppetSprite(21, 0)
  108.   puppetSprite(1, 0)
  109. end
  110.  
  111. on crtzoomin
  112.   puppetSprite(23, 1)
  113.   repeat while the stillDown
  114.     set the memberNum of sprite 23 to 33
  115.     updateStage()
  116.   end repeat
  117.   set the memberNum of sprite 23 to 32
  118.   updateStage()
  119.   puppetSprite(23, 0)
  120. end
  121.  
  122. on crtzoomout
  123.   puppetSprite(23, 1)
  124.   repeat while the stillDown
  125.     set the memberNum of sprite 23 to 35
  126.     updateStage()
  127.   end repeat
  128.   set the memberNum of sprite 23 to 34
  129.   updateStage()
  130.   puppetSprite(23, 0)
  131.   puppetSprite(1, 0)
  132. end
  133.  
  134. on crtclose2
  135.   puppetSprite(22, 1)
  136.   repeat while the stillDown
  137.     set the memberNum of sprite 22 to 31
  138.     updateStage()
  139.   end repeat
  140.   set the memberNum of sprite 22 to 30
  141.   updateStage()
  142.   puppetSprite(22, 0)
  143. end
  144.  
  145. on crtok
  146.   puppetSprite(20, 1)
  147.   repeat while the stillDown
  148.     set the memberNum of sprite 20 to 62
  149.     updateStage()
  150.   end repeat
  151.   set the memberNum of sprite 20 to 61
  152.   updateStage()
  153.   puppetSprite(20, 0)
  154. end
  155.  
  156. on crtexit
  157.   puppetSprite(21, 1)
  158.   repeat while the stillDown
  159.     set the memberNum of sprite 21 to 64
  160.     updateStage()
  161.   end repeat
  162.   set the memberNum of sprite 21 to 63
  163.   updateStage()
  164.   puppetSprite(21, 0)
  165. end
  166.